home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Tools 2
/
Amiga Tools 2.iso
/
dfue
/
avmnfax
/
source
/
playdate.avmsrc
< prev
next >
Wrap
Text File
|
1995-03-09
|
6KB
|
339 lines
startrecord=true
label=playdate
nodetype=14
comment=We're going to play the month and day
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=8
line1=procedure
line2=parse arg actualDate
line3=
line4=
line5=
line6=
line7=
line8=
line9=
line10=
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=8
line1=dateformat = getclip('AVMDateFormat')
line2=if dateformat = "" then dateformat = "%month %day"
line3=else if upper(dateformat) = "NONE" then dateformat = ""
line4=
line5=
line6=
line7=
line8=
line9=
line10=
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=8
line1=do i = 1 to words(dateformat)
line2= if upper(word(dateformat, i)) = "%MONTH" then
line3= call playnumbranch('playdate' || substr(actualDate, 5, 2))
line4= else if upper(word(dateformat, i)) = "%DAY" then
line5= call playddnumber(substr(actualDate, 7, 2))
line6= else
line7= call playddvoice(word(dateformat, i))
line8=end
line9=
line10=
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=14
comment=We're done
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playddvoice
nodetype=8
line1=procedure
line2=parse arg filename
line3=
line4=
line5=
line6=
line7=
line8=
line9=
line10=
nextactiontype=3
nextactionaction=
endrecord=true
startrecord=true
label=
nodetype=1
filename=filename
comment=
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playdate01
nodetype=1
filename='avm:voices/monthjanuary'
comment=January
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playdate02
nodetype=1
filename='avm:voices/monthfebruary'
comment=February
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playdate03
nodetype=1
filename='avm:voices/monthmarch'
comment=March
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playdate04
nodetype=1
filename='avm:voices/monthapril'
comment=April
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playdate05
nodetype=1
filename='avm:voices/monthmay'
comment=May
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playdate06
nodetype=1
filename='avm:voices/monthjune'
comment=June
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playdate07
nodetype=1
filename='avm:voices/monthjuly'
comment=July
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playdate08
nodetype=1
filename='avm:voices/monthaugust'
comment=August
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playdate09
nodetype=1
filename='avm:voices/monthseptember'
comment=September
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playdate10
nodetype=1
filename='avm:voices/monthoctober'
comment=October
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playdate11
nodetype=1
filename='avm:voices/monthnovember'
comment=November
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true
startrecord=true
label=playdate12
nodetype=1
filename='avm:voices/monthdecember'
comment=December
keyactiontype=3
keyactionaction=
faxactiontype=0
faxactionaction=stdfax
dataactiontype=0
dataactionaction=stddata
busyactiontype=0
busyactionaction=stdbusy
abortactiontype=0
abortactionaction=stdabort
erroractiontype=0
erroractionaction=stderror
nextactiontype=2
nextactionaction=return
endrecord=true